<script>on mouseUp---------------------------------------- GET DIRECTORY OF IMAGE FOLDERPUT SELECTDIR("テ韻テ嘉 テ [テ姥テテεャツクテツ。テホゥテ液テ羽テ嘉」テ雲テï」ソテゥwテュテ凝ツオテニ津竕 テテヲテ竕・テツ「テ③") INTO IMGFIF IMGF IS NOT EMPTY THENPUT OFFSET(":",IMGF) INTO DELPUT CHAR 1 TO DEL OF IMGF&RETURN&CHAR DEL+1 TO (NUMBER OF CHARS OF IMGF-1) OF IMGF ツャINTO CD FLD"IMGFOLDER"ELSEPUT "Undefined." INTO CD FLD"IMGFOLDER"PUT "::::" INTO IMGF-- PUT 0 INTO CD FLD"DOCS"-- EXIT MOUSEUPEND IFSET CURSOR TO WATCH--------------------------------- COUNT NUMBER OF IMAGES IN THE FOLDERPUT FILES(IMGF,"JFIF,JPEG,GIFf") INTO IMGLPUT NUMBER OF LINES OF IMGL INTO CD FLD"IMGS" OF CD 1----------------------------- COUNT NUMBER OF DOCUMENTS IN THE FOLDERPUT 0 INTO DPUT RETURN&FILES(IMGF,"TEXT") INTO DOCLREPEAT WITH I=1 TO NUMBER OF LINES OF IMGL-- IF RETURN&CHAR 1 TO OFFSET(".", LINE I OF IMGL) OF LINE I OF IMGL&"DOC" IS IN DOCLツャ-- OR RETURN&CHAR 1 TO OFFSET(".", LINE I OF IMGL) OF LINE I OF IMGL&"Q4D" IS IN DOCL -- FOR Mr."O".-- THEN ADD 1 TO DIF RETURN&CHAR 1 TO OFFSET(".", LINE I OF IMGL) OF LINE I OF IMGL IS IN DOCLTHEN ADD 1 TO DEND REPEATPUT D INTO CD FLD"DOCS" OF CD 1---------------------------------------------- SET CONFIGURATION FIELDSIF THERE IS A FILE IMGF&"Index.html" --- CHECK PREVIOUS "Index.html"THENOPEN FILE IMGF&"Index.html"READ FROM FILE IMGF&"Index.html" FOR 16384PUT IT INTO PREHTMLREAD FROM FILE IMGF&"Index.html" FOR 16384PUT IT AFTER PREHTMLCLOSE FILE IMGF&"Index.html"ELSEPUT FLD"HTMLHEAD" INTO PREHTMLEND IFIF OFFSET("<! IndexTable>",PREHTML) IS NOT 0 THEN ------ GET HTMLTABLEPUT CHAR OFFSET("<! IndexTable>",PREHTML)+14 TO OFFSET("<! /IndexTable>",PREHTML)-1ツャOF PREHTML INTO INDXELSEPUT EMPTY INTO INDXEND IF---------------- CHECK INSIDE <! IndexTable>IF INDX IS NOT EMPTY AND INDX IS NOT RETURN THENPUT CHAR OFFSET("<TH",INDX) TO OFFSET("</TH>",INDX)-1 OF INDX INTO TTLPUT CHAR OFFSET(">",TTL)+1 TO NUMBER OF CHARS OF TTL OF TTL INTO CD FLD"TITLE" -- TITLEPUT GETHREF(INDX) INTO CD FLD"LINKDIR" ---- LINK DIRECTORYPUT CHAR OFFSET("<H",INDX) TO NUMBER OF CHARS OF INDX OF INDX INTO TBLPUT CHAR OFFSET("ALIGN=",TBL)+6 TO OFFSET(">",TBL) OF TBL INTO ALN -- TABLE ALIGNPUT CHAR 1 TO OFFSET(" ",ALN)-1 OF ALN INTO ALNIF ALN IS NOT EMPTY THEN SET NAME OF BTN 6 TO ALN ELSE SET NAME OF BTN 6 TO "CENTER"PUT CHAR OFFSET("<TABLE",INDX) TO NUMBER OF CHARS OF INDX OF INDX INTO TBLPUT CHAR OFFSET("BORDER=",TBL)+7 TO OFFSET(">",TBL) OF TBL INTO BDR -- TABLE BORDERPUT CHAR 1 TO OFFSET(" ",BDR)-1 OF BDR INTO BDRIF BDR IS A NUMBER THEN PUT BDR INTO CD FLD"TBORDER" ELSE PUT 0 INTO CD FLD"TBORDER"PUT CHAR OFFSET("<TD",INDX) TO NUMBER OF CHARS OF INDX OF INDX INTO TDPUT CHAR OFFSET("ALIGN=",TD)+6 TO OFFSET(">",TD) OF TD INTO ALN -- TABLE ALIGNPUT CHAR 1 TO OFFSET(" ",ALN)-1 OF ALN INTO ALNIF ALN IS NOT EMPTY THEN SET NAME OF BTN 7 TO ALN ELSE SET NAME OF BTN 7 TO "CENTER"PUT CHAR 1 TO OFFSET("</TR>",TD) OF TD INTO COL -- NUMBER OF COLUMNSPUT 1 INTO IREPEATDELETE CHAR 1 TO OFFSET("<TD",COL)+2 OF COLIF "<TD" IS NOT IN COL THEN EXIT REPEATADD 1 TO IEND REPEATPUT I INTO CD FLD"COLUMN"DELETE CHAR 1 TO OFFSET("<A HREF",TD)-1 OF TD -- DISPLAY FILENAME?IF CHAR OFFSET(">",TD)+1 TO OFFSET("<IMG",TD)-1 OF TD IS NOT EMPTYTHENSET NAME OF BTN 8 TO "On Thumbnail"ELSEPUT CHAR OFFSET("<IMG",TD) TO OFFSET("</A",TD)-1 OF TD INTO FLNIF OFFSET(">",FLN) IS NUMBER OF CHARS OF FLN THEN SET NAME OF BTN 8 TO "Don't Display"ELSEIF "><BR>" IS NOT IN FLN THEN SET NAME OF BTN 8 TO "Right of Thumbnail"ELSE SET NAME OF BTN 8 TO "Under Thumbnail"END IFEND IFPUT CHAR OFFSET("<IMG",INDX) TO NUMBER OF CHARS OF INDX OF INDX INTO IMGPUT CHAR OFFSET("HSPACE=",IMG)+7 TO OFFSET(">",IMG) OF IMG INTO ISP -- IMAGE SPACEPUT CHAR 1 TO OFFSET(" ",ISP)-1 OF ISP INTO ISPIF ISP IS A NUMBER THEN PUT ISP INTO CD FLD"ISPACE" ELSE PUT 0 INTO CD FLD"ISPACE"PUT CHAR OFFSET("BORDER=",IMG)+7 TO OFFSET(">",IMG) OF IMG INTO BDR -- IMAGE BORDERPUT CHAR 1 TO OFFSET(" ",BDR)-1 OF BDR INTO BDRIF BDR IS A NUMBER THEN PUT BDR INTO CD FLD"IBORDER" ELSE PUT 0 INTO CD FLD"IBORDER"ELSEPUT "Click Thumbnail." INTO CD FLD"TITLE"PUT "./" INTO CD FLD"LINKDIR"SET NAME OF BTN 6 TO "CENTER"PUT 1 INTO CD FLD"TBORDER"SET NAME OF BTN 7 TO "CENTER"PUT 3 INTO CD FLD"COLUMN"SET NAME OF BTN 8 TO "Under Thumbnail"PUT 0 INTO CD FLD"ISPACE"PUT 2 INTO CD FLD"IBORDER"END IFend mouseUp</script>
</part>
<part>
<id>2</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>10</left>
<top>91</top>
<right>214</right>
<bottom>115</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<name>Make Index </name>
<script>on mouseUpPUT LINE 1 OF CD FLD"IMGFOLDER" & LINE 2 OF CD FLD"IMGFOLDER" INTO IMGFIF NOT ISFOLDER(IMGF) THENANSWER"テ液テ羽テ嘉」テ雲テ邃「テ・ツゥテャテアテホゥテテ凝窶ケテマ\テテ津③"EXIT MOUSEUPEND IFPUT ":" AFTER IMGF--------------------------------- COUNT NUMBER OF IMAGES IN THE FOLDERPUT FILES(IMGF,"JFIF,JPEG,GIFf") INTO IMGLPUT NUMBER OF LINES OF IMGL INTO CD FLD"IMGS" OF CD 1----------------------------- COUNT NUMBER OF DOCUMENTS IN THE FOLDERPUT 0 INTO DPUT RETURN&FILES(IMGF,"TEXT") INTO DOCLREPEAT WITH I=1 TO NUMBER OF LINES OF IMGLIF RETURN&CHAR 1 TO OFFSET(".", LINE I OF IMGL) OF LINE I OF IMGL IS IN DOCLTHEN ADD 1 TO DEND REPEATPUT D INTO CD FLD"DOCS" OF CD 1IF IMGF IS EMPTY OR IMGF IS "::::" OR IMGF IS "Undefined." THENANSWER"テ窶ケテ竏湘韻テ嘉 テ [テ姥テテεャツクテツ。テホゥテ液テ羽テ嘉」テ雲テï」ソテゥwテュテ凝ツオテニ津竕 テテヲテ竕・テツ「テ③"EXIT MOUSEUPEND IFCHKFLD "TBORDER" ---- CHECK CONFIG FLDS.CHKFLD "COLUMN"CHKFLD "ISPACE"CHKFLD "IBORDER"IF CD FLD"IMGS" IS 0 THENANSWER"テ液テ羽テ嘉」テ雲テャ窶。テ窶ヲテ「テ甘ォテコテ液テ院テ韻テ嘉」テ邃「テ・ツゥテャテアテホゥテテ凝窶ケテマ\テテ津③"EXIT MOUSEUPEND IF--------------------------- CREATE "preview" FOLDER IN THE IMAGE FOLDERPUT IMGF&"preview" INTO PRVDIRIF NOT ISFOLDER(PRVDIR) THENCREATEFOLDER(PRVDIR)END IF---------------------------------------------------テ①CREATE HTML HEADERPUT RETURN INTO LF --- PUT LINEFEED INTO LFIF THERE IS A FILE IMGF&"Index.html" --- CHECK PREVIOUS "Index.html"THENOPEN FILE IMGF&"Index.html"READ FROM FILE IMGF&"Index.html" FOR 16384PUT IT INTO PREHTMLREAD FROM FILE IMGF&"Index.html" FOR 16384PUT PREHTML&IT INTO PREHTMLCLOSE FILE IMGF&"Index.html"ELSEPUT FLD"HTMLHEAD" INTO PREHTMLEND IFIF OFFSET("<! IndexTable>",PREHTML) IS NOT 0 THEN -- SPLIT PREHTML INTO HTMLHEAD,HTMLTABLE,HTMLFOOTPUT CHAR 1 TO OFFSET("<! IndexTable>",PREHTML)+14 OF PREHTML INTO HTMLHEADPUT CHAR OFFSET("<! /IndexTable>",PREHTML) ツャTO NUMBER OF CHARS OF PREHTML OF PREHTML INTO HTMLFOOTPUT CHAR OFFSET("<! IndexTable>",PREHTML)+14 TO OFFSET("<! /IndexTable>",PREHTML)-1ツャOF PREHTML INTO HTMLTABLEELSEPUT CHAR 1 TO OFFSET("<BODY>",PREHTML)+6 OF PREHTML&"<! IndexTable>"&LF INTO HTMLHEADPUT "<! /IndexTable>"&LF&CHAR OFFSET("<BODY>",PREHTML)+7 ツャTO NUMBER OF CHARS OF PREHTML OF PREHTML INTO HTMLFOOTPUT EMPTY INTO HTMLTABLEEND IFIF OFFSET("<TITLE></TITLE>",HTMLHEAD) IS NOT 0 THEN --- ADD TITLEREPEAT WITH I= NUMBER OF CHARS OF IMGF DOWN TO 1IF CHAR I-1 OF IMGF IS ":" THEN EXIT REPEATEND REPEATPUT CHAR I TO (NUMBER OF CHARS OF IMGF-1) OF IMGF ツャAFTER CHAR OFFSET("<TITLE>",HTMLHEAD)+6 OF HTMLHEADEND IFIF CD FLD"DOCS">0 THEN --- PUT JAVASCRIPT CODE FOR SHOWING DOCUMENTIF OFFSET("<SCRIPT>",HTMLHEAD) IS 0 THENPUT RETURN&"<SCRIPT>"&RETURN&"</SCRIPT>"&RETURN ツャINTO CHAR OFFSET("</TITLE>",HTMLHEAD)+8 OF HTMLHEADEND IFIF OFFSET("function DocInNewWdw",HTMLHEAD) IS 0 THENPUT FLD"DocInNewWdw" INTO CHAR OFFSET("<SCRIPT>",HTMLHEAD)+8 OF HTMLHEADEND IFEND IFPUT CD FLD"COLUMN" INTO COLUMNPUT "<TD ALIGN="&SHORT NAME OF BTN 7 &" >" INTO TDIF CD FLD"ISPACE" IS NOT 0 THENPUT " HSPACE="&CD FLD"ISPACE"&" VSPACE="&CD FLD"ISPACE" INTO ISPACEELSE PUT EMPTY INTO ISPACEPUT " BORDER="&CD FLD"IBORDER" INTO IBORDERPUT SHORT NAME OF BTN 8 INTO FLNIF FLN IS "On Thumbnail" THEN PUT 1 INTO FLNIF FLN IS "Right of Thumbnail" THEN PUT 2 INTO FLNIF FLN IS "Under Thumbnail" THEN PUT 3 INTO FLNIF CD FLD"TITLE" IS NOT EMPTYTHENPUT "<TR>"&LF&"<TH colspan="&COLUMN&">"ツャ&CD FLD"TITLE"&"</TH>"&LF&"</TR>"&LF INTO TTELSE PUT EMPTY INTO TTPUT "<H4 ALIGN="&SHORT NAME OF BTN 6&" >"&LF&"<TABLE BORDER="&CD FLD"TBORDER"ツャ&" >"&LF&TT INTO HTMLPUT EMPTY INTO DHTM --DOCUMENT TABLEPUT 1 INTO TX -- COLUMN COUNTERPUT 1 INTO DX -- COLUMN COUNTER FOR DOCUMENT TABLEIF THERE IS A WINDOW "PREVIEW" THEN CLOSE WINDOW"PREVIEW"------------------------------------------------------------- MAIN LOOP--put the ticks into t1REPEAT WITH I=1 TO NUMBER OF LINES OF IMGLSET CURSOR TO BUSYPUT LINE I OF IMGL INTO PRVNAMEPUT I&" of "& NUMBER OF LINES OF IMGL &" Images Completed."IF PRVNAME IS IN HTMLTABLE THEN --- GET <IMG>TAG.PUT CHAR OFFSET("<IMG SRC=""E&GETHREF(HTMLTABLE)&"preview/"&ツャPRVNAME,HTMLTABLE) TO NUMBER OF CHARS OF HTMLTABLE OF HTMLTABLE INTO IMGPUT CHAR 1 TO OFFSET("</TD>",IMG)-1 OF IMG INTO IMGELSEPUT EMPTY INTO IMGEND IFIF " WIDTH=" IS NOT IN IMG THEN -- GET WIDTH&HEIGHT OF PREVIEWPUT IMGF&LINE I OF IMGL INTO IMGDIRPUT "T=PICT" INTO TPUT "W="&IMGDIR INTO WPUT "O=I" INTO OPUT FULLRESLIST(T,W,O) INTO RESNAMEIF WORD 1 OF RESNAME IS NOT "Error" THENPICTTOCLIP IMGDIR,RESOURCE,RESNAME -- COPY RESOURCEPICTURE "PREVIEW",CLIPBOARD,RECT,TRUE,0,TRUE -- PUT PICTUREPUT " WIDTH="&PICTUREWIDTH OF WINDOW"PREVIEW"ツャ&" HEIGHT="&PICTUREHEIGHT OF WINDOW"PREVIEW" INTO SZELSE PUT " width =32 height =32" INTO SZ --- IS NOT "WIDTH=...".ELSEPUT CHAR OFFSET("WIDTH=",IMG) TO NUMBER OF CHARS OF IMG OF IMG INTO H1PUT SPACE&CHAR 1 TO OFFSET(SPACE,H1) OF H1 INTO SZDELETE CHAR 1 TO OFFSET("HEIGHT=",H1)-1 OF H1PUT CHAR 1 TO OFFSET(SPACE,H1)-1 OF H1 AFTER SZEND IFIF THERE IS NOT A FILE PRVDIR&":"&LINE I OF IMGL&".JPG" AND WORD 1 OF RESNAME IS NOT "Error"THENCLIPTOPICT PRVDIR&":"&PRVNAME,"C=N" --,"64,64","true" -- SAVE CLIPBOARD IN "preview"-- COMPRESSION=NORMAL."Low-Normal-High". "D=8" DEPTH=8bit.SET CURSOR TO BUSYPICTtoJFIF FILE,PRVDIR&":"&PRVNAME,PRVDIR&":"&PRVNAME&".JPG",0,0 -- CREATE JFIF FILEFULLREMOVE PRVDIR&":"&PRVNAME -- DELETE PICT FILEEND IFIF TX=1 THEN PUT"<TR>"&LF&"<P>"&LF AFTER HTMLPUT CHAR OFFSET("</A>",IMG)+4 TO NUMBER OF CHARS OF IMG OF IMG INTO CM --- SAVE COMMENT.PUT "<IMG SRC=""E&"./preview/"&PRVNAME&".JPG""E&SZ&ISPACE&IBORDER&" >" INTO IMIF FLN=1 THEN PUT LINE I OF IMGL&"<BR>" BEFORE IMIF FLN=2 THEN PUT " "&LINE I OF IMGL AFTER IMIF FLN=3 THEN PUT "<BR>"&LINE I OF IMGL AFTER IMPUT CHAR 1 TO OFFSET(".", PRVNAME) OF PRVNAME INTO DOCNAMEIF DOCNAME IS EMPTY THEN PUT PRVNAME INTO DOCNAMEIF RETURN&DOCNAME IS IN DOCLTHENPUT CHAR OFFSET(RETURN&DOCNAME,DOCL)+1 TO NUMBER OF CHARS OF DOCL OF DOCL INTO DOCNAMEPUT LINE 1 OF DOCNAME INTO DOCNAMEIF DOCNAME IS NOT EMPTY AND LAST CHAR OF DOCNAME IS NOT"_" THENFULLRENAME IMGF&DOCNAME , DOCNAME&"_" -- ADD"_" TO DOCUMENT FILENAMEPUT "_" AFTER DOCNAMEEND IFPUT TD&"<A HREF=""E&CD FLD"LINKDIR"&PRVNAME"E&" onClick=""E&ツャ"DocInNewWdw('"&CD FLD"LINKDIR"&DOCNAME&"')""E&">"&IM&"</A>"&CM&"</TD>"&LF AFTER HTMLPUT TD&"<A HREF=""E&CD FLD"LINKDIR"&DOCNAME"E&">"&" "&DOCNAME&" "&"</A></TD>"&LF AFTER DHTMADD 1 TO DXIF DX>COLUMN OR I=NUMBER OF LINES OF IMGL THENPUT "</P>"&LF&"</TR>"&LF AFTER DHTMPUT 1 INTO DXEND IFELSEPUT TD&"<A HREF=""E&CD FLD"LINKDIR"&PRVNAME"E&">"&IM&"</A>"&CM&"</TD>"&LF AFTER HTMLEND IFADD 1 TO TXIF TX>COLUMN OR I=NUMBER OF LINES OF IMGL THENPUT "</P>"&LF&"</TR>"&LF AFTER HTMLPUT 1 INTO TXEND IFIF THERE IS A WINDOW "PREVIEW" THEN CLOSE WINDOW"PREVIEW"PUT PRVNAME INTO LINE I OF CEND REPEAT------------------------------------------------------------ SAVE HTMLPUT HTMLHEAD BEFORE HTMLIF DHTM IS NOT EMPTY THENPUT "<TABLE BORDER="&CD FLD"TBORDER"&" >"&LF BEFORE DHTMPUT "</TABLE>"&LF&"<BR>"&LF AFTER DHTMEND IFPUT "</TABLE>"&LF&DHTM&"Last Modified: "&THE DATE&" , "&THE TIME&LF&"</H4>"&LF&HTMLFOOT AFTER HTML-- PUT HTML INTO CD FLD"VERIFY"-- SHOW CD FLD"VERIFY"OPEN FILE IMGF&"Index.html"WRITE HTML TO FILE IMGF&"Index.html"CLOSE FILE IMGF&"Index.html"SETFINFO IMGF&"Index.html","C=MOSS" -- SET CREATOR TO "Netscape Navigator".PUT "Done."WAIT 60 TICKSHIDE MSG-- put (the ticks - t1)end mouseUp</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>10</left>
<top>160</top>
<right>213</right>
<bottom>176</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>TITLE</name>
<script></script>
</part>
<part>
<id>42</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>154</left>
<top>259</top>
<right>181</right>
<bottom>275</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>COLUMN</name>
<script></script>
</part>
<part>
<id>57</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>57</left>
<top>32</top>
<right>214</right>
<bottom>72</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>IMGFOLDER</name>
<script></script>
</part>
<part>
<id>60</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>57</left>
<top>72</top>
<right>100</right>
<bottom>89</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>IMGS</name>
<script></script>
</part>
<part>
<id>61</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>171</left>
<top>72</top>
<right>214</right>
<bottom>89</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>DOCS</name>
<script></script>
</part>
<part>
<id>65</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>10</left>
<top>121</top>
<right>66</right>
<bottom>138</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<name>Config...</name>
<script>on mouseUpLOCK SCREENPUT TOP OF CARD WINDOW INTO TCIF HEIGHT OF CARD WINDOW IS 145THENSET HEIGHT OF CARD WINDOW TO 336ELSESET HEIGHT OF CARD WINDOW TO 145END IFSET TOP OF CARD WINDOW TO TCUNLOCK SCREENIF HEIGHT OF CARD WINDOW IS 336THEN SELECT AFTER LAST CHAR OF CD FLD"TITLE"end mouseUp</script>
</part>
<part>
<id>66</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>171</left>
<top>121</top>
<right>191</right>
<bottom>140</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>26635</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>HELP</name>
<script>on mouseUpIF VISIBLE OF CD FLD"HELP" IS FALSETHENLOCK SCREENSHOW CD FLD"HELP"UNLOCK SCREEN WITH VISUAL DISSOLVE FASTELSEHIDE CD FLD"HELP"END IFend mouseUp</script>
</part>
<part>
<id>67</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>190</left>
<top>120</top>
<right>214</right>
<bottom>142</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>21700</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>HOME</name>
<script>on mouseUpANSWER "Where you going?" with "Home","Quit","Cancel"IF IT IS "Home" THEN GO HOMEIF IT IS "Quit" THEN DOMENU "QUIT HYPERCARD"end mouseUp</script>
</part>
<part>
<id>58</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>10</left>
<top>30</top>
<right>214</right>
<bottom>118</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>HELP</name>
<script>ON MOUSEUPHIDE MEEND MOUSEUP</script>
</part>
<part>
<id>72</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>10</left>
<top>191</top>
<right>213</right>
<bottom>207</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>LINKDIR</name>
<script></script>
</part>
<part>
<id>82</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>168</left>
<top>224</top>
<right>195</right>
<bottom>240</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TBORDER</name>
<script></script>
</part>
<part>
<id>86</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>0</left>
<top>0</top>
<right>224</right>
<bottom>311</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>VERIFY</name>
<script></script>
</part>
<part>
<id>90</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>51</left>
<top>224</top>
<right>110</right>
<bottom>241</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>CENTER</name>
<script>on mouseDownGET FULLHPOP("LEFT"&RETURN&"CENTER"&RETURN&"RIGHT"&RETURN)SET NAME OF ME TO ITEM 1 OF IT-- PUT RECT OF ME INTO R-- PUT (ITEM 1 OF R)+ITEM 1 OF LINE 2 OF IT+25 INTO ITEM 3 OF R-- SET RECT OF ME TO RSET RIGHT OF BTN"TAarw" TO RIGHT OF MEend mouseDown</script>
</part>
<part>
<id>91</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>51</left>
<top>258</top>
<right>110</right>
<bottom>275</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>CENTER</name>
<script>on mouseDownGET FULLHPOP("LEFT"&RETURN&"CENTER"&RETURN&"RIGHT"&RETURN)SET NAME OF ME TO ITEM 1 OF IT-- PUT RECT OF ME INTO R-- PUT (ITEM 1 OF R)+ITEM 1 OF LINE 2 OF IT+25 INTO ITEM 3 OF R-- SET RECT OF ME TO RSET RIGHT OF BTN"CAarw" TO RIGHT OF MEend mouseDown</script>
</part>
<part>
<id>93</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>280</top>
<right>181</right>
<bottom>297</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>Under Thumbnail</name>
<script>on mouseDownGET FULLHPOP("Don't Display"&RETURN&"On Thumbnail"&RETURN&"Right of Thumbnail"ツャ&RETURN&"Under Thumbnail"&RETURN)SET NAME OF ME TO ITEM 1 OF IT-- PUT RECT OF ME INTO R-- PUT (ITEM 1 OF R)+ITEM 1 OF LINE 2 OF IT+25 INTO ITEM 3 OF R-- SET RECT OF ME TO RSET RIGHT OF BTN"FNarw" TO RIGHT OF MEend mouseDown</script>
</part>
<part>
<id>100</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>156</left>
<top>315</top>
<right>183</right>
<bottom>331</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>IBORDER</name>
<script></script>
</part>
<part>
<id>101</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>89</left>
<top>224</top>
<right>110</right>
<bottom>240</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>31383</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>TAarw</name>
<script>on mouseDownsend mouseDown to btn 6end mouseDown</script>
</part>
<part>
<id>102</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>89</left>
<top>259</top>
<right>110</right>
<bottom>275</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>31383</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>CAarw</name>
<script>on mouseDownsend mouseDown to btn 7end mouseDown</script>
</part>
<part>
<id>103</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>160</left>
<top>280</top>
<right>181</right>
<bottom>296</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>31383</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>FNarw</name>
<script>on mouseDownsend mouseDown to btn 8end mouseDown</script>